home *** CD-ROM | disk | FTP | other *** search
/ Power Programmierung 2 / Power-Programmierung CD 2 (Tewi)(1994).iso / c / library / dos / grafik / cgazv5n3 / ot.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-02-25  |  3.7 KB  |  127 lines
  1. /************  Listing 1 *********************  OT.C  **********************
  2. *
  3. *  ot.c --   Object Record Traversal
  4. *  Author:   Thomas E. Siering, 1991
  5. * 
  6. *  Usage:    This utility will list the Record Types present in a given
  7. *            OBJ module.  Any command line parameters (other than the
  8. *            OBJ file name) are considered Record Types.  In that case,
  9. *            only the presence of those types will be reported.
  10. *            Any Record Type 0 <= RT <= 255 will be searched for even if
  11. *            it is not (universally) recognized as part of the OMF standard.
  12. *            CAVEAT: Record Type on command line has to be DECIMAL!
  13. * 
  14. *  Compiler: Microsoft C 6.0, Turbo C++ 1.0
  15. * 
  16. *  Compile time switches: none
  17. * 
  18. *  Links with: This is a stand-alone module.
  19. *
  20. *  (c) Copyright 1991, C Gazette. May be used freely as long as authorship
  21. *                      and publication are acknowledged.
  22. ***************************************************************************/
  23.  
  24. #include <stdio.h>
  25. #include <stdlib.h>
  26. #include <limits.h>
  27.  
  28.  
  29. #pragma pack(1)         /* Byte-align the ObjHeader struct */
  30.  
  31. typedef enum { false, true } bool;
  32.  
  33.  
  34. static char ProgName[] = { "OT" };
  35.  
  36.  
  37. void main (int argc, char *argv[])
  38. {
  39.     FILE *ObjFH;
  40.     int RecTypeCount[UCHAR_MAX + 1];
  41.     bool DoShow[UCHAR_MAX + 1];
  42.  
  43.     struct {
  44.         unsigned char RecordType;
  45.         int RecordLength;
  46.     } ObjHeader;
  47.  
  48.     int RecTotal;
  49.     int i;
  50.  
  51.     /* Usage info for the uninitiated */
  52.     if (argc < 2) 
  53.     {
  54.         fprintf(stderr, "\aUsage: %s fn.obj [options]\n", ProgName);
  55.         fprintf(stderr, "Options: Record Types to list\n");
  56.         exit(-1);
  57.     }
  58.  
  59.     /* Check out the OBJ module file */
  60.     if ( (ObjFH = fopen(argv[1], "rb")) == NULL ) 
  61.     {
  62.         fprintf(stderr, "\aFile %s could not be opened\n", argv[1]);
  63.         exit(-1);
  64.     }
  65.  
  66.     /* So far, no instances of any Record Type have been sighted */
  67.     for (i = 0; i <= UCHAR_MAX; i++)
  68.         RecTypeCount[i] = 0;
  69.  
  70.     /* Sort out which OBJ records we'll want to know about */
  71.     if (argc == 2)
  72.         /* Show them all! */
  73.         for (i = 0; i <= UCHAR_MAX; i++)
  74.             DoShow[i] = true;
  75.     else 
  76.     {
  77.         int RecType;
  78.  
  79.         for (i = 0; i <= UCHAR_MAX; i++)
  80.             DoShow[i] = false;
  81.  
  82.         for (i = argc; i > 2; i--) 
  83.         {
  84.             RecType = atoi(argv[i - 1]);
  85.             if (RecType < 0 || RecType > UCHAR_MAX)
  86.                 fprintf(stderr, "\aIncorrect Record Type entered: %X\n",
  87.                         RecType);
  88.             else
  89.                 DoShow[RecType] = true;
  90.         }
  91.     }
  92.  
  93.  
  94.     while ( fread(&ObjHeader, sizeof(ObjHeader), 1, ObjFH) == 1) 
  95.     {
  96.         /* Another OBJ record to account for */
  97.         RecTypeCount[ObjHeader.RecordType]++;
  98.         fseek(ObjFH, (long) ObjHeader.RecordLength, SEEK_CUR);
  99.  
  100.     #ifdef VERBOSE
  101.         fprintf(stdout, "Record Type = %02X\nLength = %d\n",
  102.                 ObjHeader.RecordType & 0x00FF, ObjHeader.RecordLength);
  103.     #endif
  104.     }
  105.  
  106.     /* Make sure last read failed because of EOF. 
  107.        Otherwise there's trouble! */
  108.     if (feof (ObjFH) == 0) 
  109.     {
  110.         fprintf(stderr, "\aRead of OBJ Failed.  Aborting\n");
  111.         exit(-1);
  112.     }
  113.  
  114.     fclose(ObjFH);
  115.  
  116.     /* Finally, print the statistics */
  117.     fprintf(stdout, "File %s:\n", argv[1]);
  118.     for (i = 0, RecTotal = 0; i <= UCHAR_MAX; i++) 
  119.     {
  120.         if (RecTypeCount[i] > 0 && DoShow[i] == true) 
  121.         {
  122.             fprintf(stdout, "RecordType %X  --  %d\n", i, RecTypeCount[i]);
  123.             RecTotal += RecTypeCount[i];
  124.         }
  125.     }
  126.     fprintf(stdout, "Total Records: %d\n\n", RecTotal);
  127. }